object FRecTest: TFRecTest Left = 428 Top = 222 HorzScrollBar.Visible = False VertScrollBar.Visible = False BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Record Test' ClientHeight = 363 ClientWidth = 427 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter Scaled = False OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Memo1: TMemo Left = 15 Top = 149 Width = 403 Height = 132 TabStop = False BorderStyle = bsNone Color = clBtnFace Ctl3D = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'This test will check if your microphone is working properly.' '' 'When you press the Test button below, you should begin ' 'recording a short 4 second message. The message will be ' 'played back to you.' '' 'If you hear your voice, continue the setup wizard by clicking ' 'on the Next button.') ParentCtl3D = False ParentFont = False TabOrder = 1 end object Btest: TButton Left = 7 Top = 327 Width = 75 Height = 23 Caption = 'Test' TabOrder = 0 OnClick = BtestClick end object BNext: TButton Left = 97 Top = 327 Width = 75 Height = 23 Caption = 'Next >' TabOrder = 2 OnClick = BNextClick end object BCancel: TButton Left = 332 Top = 327 Width = 75 Height = 23 Caption = 'Cancel' TabOrder = 3 OnClick = BCancelClick end object BAdjust: TButton Left = 187 Top = 327 Width = 75 Height = 23 Caption = 'Adjust' TabOrder = 4 Visible = False OnClick = BAdjustClick end object Panel1: TGroupBox Left = 8 Top = 8 Width = 409 Height = 129 TabOrder = 5 object Label1: TLabel Left = 56 Top = 32 Width = 38 Height = 13 Caption = 'Volume:' Enabled = False Visible = False end object Label4: TLabel Left = 184 Top = 32 Width = 20 Height = 13 Alignment = taRightJustify Caption = 'Low' Enabled = False Visible = False end object Label2: TLabel Left = 368 Top = 32 Width = 22 Height = 13 Caption = 'High' Enabled = False Visible = False end object Label3: TLabel Left = 56 Top = 88 Width = 140 Height = 13 Alignment = taRightJustify Caption = 'Preferred Net2Phone Device:' end object Image1: TImage Left = 8 Top = 24 Width = 40 Height = 40 Picture.Data = {} Transparent = True end object TrackBar1: TTrackBar Left = 208 Top = 26 Width = 161 Height = 41 Ctl3D = True Enabled = False LineSize = 655 Max = 65535 Orientation = trHorizontal ParentCtl3D = False PageSize = 6554 Frequency = 6554 Position = 50 SelEnd = 0 SelStart = 0 TabOrder = 0 TickMarks = tmBottomRight TickStyle = tsAuto Visible = False OnChange = TrackBar1Change end object Devices: TComboBox Left = 216 Top = 84 Width = 145 Height = 21 ItemHeight = 13 TabOrder = 1 Text = '(none)' OnChange = DevicesChange end end object PlayPanel: TPanel Left = 8 Top = 288 Width = 409 Height = 25 Alignment = taLeftJustify BevelOuter = bvNone Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 6 object RecPlayLabel: TLabel Left = 7 Top = 6 Width = 79 Height = 13 Caption = 'Recording.....' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Visible = False end end end